<!--<%@language=vbscript codepage=936 %>-->
<!--#include file="conn.html"-->
<!--#include file="admin.html"-->
<!--  <%
dim UserID,sql,rs
UserID=trim(Request("UserID"))
if UserID<>"" then
	sql="delete from [User] where UserID=" & Clng(UserID)
	conn.Execute sql
end if
call CloseConn()      
response.redirect "UserManage.html"
%>-->